home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 126-150 / disk_146 / dmemacros / othermacros / .edrc next >
Text File  |  1992-05-06  |  3KB  |  71 lines
  1. map `left'   `ifelse l `if !t `up last'' left'
  2. map `right'  `ifelse r `if !b `down first'' right'
  3. map `s-up'   `pageup'
  4. map `s-dow'  `pagedown'
  5. map `s-lef'  `wleft'
  6. map `s-rig'  `wright'
  7. map `a-up'   `screentop'
  8. map `a-dow'  `screenbottom'
  9. map `a-lef'  `repeat 40 left'
  10. map `a-rig'  `repeat 40 right'
  11. map `sa-up'  `top'
  12. map `sa-dow' `bottom'
  13. map `sa-lef' `first'
  14. map `sa-rig' `last'
  15. map `c-up'   `scrollup'
  16. map `c-dow'  `scrolldown'
  17. map `cs-,' `if cb `goto start while cb `del down' up''
  18. map `cs-.' `if cb `goto start while cb `` ' left  down' up''
  19. map `sa-,' `if cb `goto start while cb `bs  if !b right down' left  up''
  20. map `sa-.' `if cb `goto start while cb `` ' if !b left  down' right up''
  21. resettoggle 179
  22. map `sL-lmb'   `if 179 unblock tomouse block ifelse cb `bsave ram:dme.L.clip settoggle 179' `resettoggle 179''
  23. map `cL-lmb'   `goto start'
  24. map `aL-lmb'   `goto end'
  25. map `saL-lmb'  `tomouse insfile ram:dme.L.clip'
  26. map `csaL-lmb' `bsave ram:dme.L.clip bdelete'
  27. map `sR-rmb'   `if 179 unblock tomouse block ifelse cb `bsave ram:dme.R.clip settoggle 179' `resettoggle 179''
  28. map `cR-rmb'   `goto start'
  29. map `aR-rmb'   `goto end'
  30. map `saR-rmb'  `tomouse insfile ram:dme.R.clip'
  31. map `csaR-rmb' `bsave ram:dme.R.clip bdelete'
  32. map `return'   `last  ifelse b `split firstnb down down deline' `split firstnb down'  '
  33. map `s-return' `ifelse  b  `split down down deline up firstnb'  `split firstnb'  repeat cleft `first down ` ' up'  firstnb down'
  34. map `del'    `ifelse !r del `ifelse l `if !b deline' `resettoggle 1 resettoggle 2 source ram:join.edrc'''
  35. map `s-del'  `ifelse ca `resettoggle 0' `settoggle 0' settoggle 3 while 3 `ifelse !r del `ifelse l `if !b deline' `resettoggle 1 resettoggle 2 source ram:join.edrc'' ifelse 0 `resettoggle 3' `if !ca `resettoggle 3''''
  36. map `sa-del' `deline'
  37. map `bs'     `ifelse l `ifelse t up `up last'' left ifelse !r del `ifelse l `if !b deline' `resettoggle 1 resettoggle 2 source ram:join.edrc'''
  38. map `s-bs'   `settoggle 3 while 3 `ifelse l `ifelse t up `up last'' left ifelse l `resettoggle 3' `left if !ca `resettoggle 3' right' if !ca `resettoggle 3' ifelse !r del `ifelse l `if !b deline' `resettoggle 1 resettoggle 2 source ram:join.edrc''''
  39. map `sa-bs'  `deline'
  40. map `f1'     `escimm `newfile ''
  41. map `s-f1'   `escimm `newwindow newfile ''
  42. map `f2'     `escimm `insfile ''
  43. map `s-f2'   `escimm `chfilename ''
  44. map `f3'     `escimm `saveas ''
  45. map `s-f3'   `saveold'
  46. map `f4'     `quit'
  47. map `s-f4'   `saveold quit'
  48. map `f5'     `source dme.R.clip   unblock'
  49. map `s-f5'   `source dme.L.clip   unblock''
  50. map `f6'     `topedge 12 height 45 newwindow newfile dme.R.clip topedge 1 height 360'
  51. map `s-f6'   `topedge 58 height 45 newwindow newfile dme.L.clip topedge 1 height 360'
  52. map `f7'     `prev'
  53. map `s-f7'   `ifelse r `if !b `down first'' `right' prevr'
  54. map `sa-f7'  `escimm `ifelse r  `if !b `down first'' `right'  prevr  repeat -1 prevr''
  55. map `f8'     `next'
  56. map `s-f8'   `ifelse l `if !t `up last'' `left' nextr'
  57. map `sa-f8'  `escimm `ifelse l  `if !t `up last'' `left'  nextr  repeat -1 nextr''
  58. map `f9'     (escimm (findstr `) prev)
  59. map `s-f9'   (escimm (findstr `) escimm (repstr `) prev)
  60. map `f10'    (escimm (findstr `) next)
  61. map `s-f10'  (escimm (findstr `) escimm (repstr `) next)
  62. map `c-g'    `escimm `goto ''
  63. map `c-k'    `remeol'
  64. map `tab'    `tab'
  65. map `s-tab'  `backtab'
  66. map `help'   `recall'
  67. insertmode on
  68. savetabs on
  69. tabstop 3
  70. pageset 96
  71.